﻿Public Class frmMain


    Private Sub GastosComunesToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GastosComunesToolStripMenuItem.Click

        frmGastosComunes.MdiParent = Me
        frmGastosComunes.Show()
    End Sub

    Private Sub GruposToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GruposToolStripMenuItem.Click
        frmGruposDeGastos.MdiParent = Me
        frmGruposDeGastos.Show()

    End Sub

    Private Sub ConceptosToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ConceptosToolStripMenuItem.Click

        frmConceptosDeGastos.MdiParent = Me
        frmConceptosDeGastos.Show()
    End Sub

    Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'conectar()
    End Sub

    Private Sub SalirToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SalirToolStripMenuItem.Click
        Application.Exit()
    End Sub

    Private Sub PersonaToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PersonaToolStripMenuItem.Click
        frmPersona.MdiParent = Me
        frmPersona.Show()
    End Sub

    Private Sub BlockToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BlockToolStripMenuItem.Click
        frmBlock.MdiParent = Me
        frmBlock.Show()
    End Sub

    Private Sub CargaGastosComunesToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CargaGastosComunesToolStripMenuItem.Click
        frmProceso.MdiParent = Me
        frmProceso.Show()
    End Sub

    Private Sub RepactarDeudaDeArrastreToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RepactarDeudaDeArrastreToolStripMenuItem.Click
        frmDeudaArrastre.MdiParent = Me
        frmDeudaArrastre.Show()
    End Sub

    Private Sub DepartamentoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DepartamentoToolStripMenuItem.Click
        frmDepartamento.MdiParent = Me
        frmDepartamento.Show()
    End Sub

    Private Sub FormaDePagoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FormaDePagoToolStripMenuItem.Click
        frmFormaPago.MdiParent = Me
        frmFormaPago.Show()
    End Sub

    Private Sub ArriendoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ArriendoToolStripMenuItem.Click
        frmArriendo.MdiParent = Me
        frmArriendo.Show()
    End Sub

    Private Sub OrdenDeIngresoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OrdenDeIngresoToolStripMenuItem.Click
        frmReImpresion.MdiParent = Me
        frmReImpresion.Show()
    End Sub

    Private Sub EgresosToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EgresosToolStripMenuItem.Click
        frmEgresos.MdiParent = Me
        frmEgresos.Show()
    End Sub

    Private Sub CargaSaldosIniciales2013ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CargaSaldosIniciales2013ToolStripMenuItem.Click
        frmCargaDeuda.MdiParent = Me
        frmCargaDeuda.Show()
    End Sub

    Private Sub EliminarPagoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EliminarPagoToolStripMenuItem.Click
        frmEliminarPago.MdiParent = Me
        frmEliminarPago.Show()
    End Sub
End Class
